home *** CD-ROM | disk | FTP | other *** search
/ Skunkware 98 / Skunkware 98.iso / src / net / bind-contrib.tar.gz / bind-contrib.tar / contrib / hostmaint / nicnet.awk < prev    next >
Encoding:
AWK Script  |  1996-10-25  |  799 b   |  29 lines
  1. BEGIN { FS = ":" }
  2. /^NET/ {
  3.   ip = $2;
  4.   while (substr(ip,1,1) == " ") ip = substr(ip,2,length(ip)-1);
  5.   while (substr(ip,length(ip),1) == " ") ip = substr(ip,1,length(ip)-1);
  6.   name = $3;
  7.   while (substr(name,1,1) == " ") name = substr(name,2,length(name)-1);
  8.   while (substr(name,length(name),1) == " ") name = substr(name,1,length(name)-1);
  9.   ni = 1;
  10.   j = 1;
  11.   for (i=1; i < length(ip); i++) {
  12.     if (substr(ip,i,1) == ".") {
  13.       ippart[ni++] = substr(ip,j,i-j);
  14.       j = i+1;
  15.     }
  16.   }
  17.   ippart[ni] = substr(ip,j,i);
  18.   ip = ippart[1]
  19.   if (ippart[1]+0 >= 128) ip = ip "." ippart[2]
  20.   if (ippart[1]+0 >= 192) ip = ip "." ippart[3]
  21.   printf "%s\t", name;
  22.   if (length(name) < 8) printf "\t"
  23.   printf "%s", ip
  24.   printf "\n";
  25.   next;
  26. }
  27. /^#/ { printf "#%s\n", substr($0,2,length($0)) }
  28. { next }
  29.